program test;
var x,y:integer;
function gtcomdiv (a,b:integer):integer;
begin
	if b=0 then gtcomdiv:=a
	else gtcomdiv:=gtcomdiv(b,a mod b);
end;
begin
	x:=12;y:=16;
	write(gtcomdiv(x,y));
end.
